home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Next Step: Mars?
/
Next Step Mars (1994)(IVI).iso
/
unearth.dir
/
00315_Script_315
< prev
next >
Wrap
Text File
|
1994-11-29
|
2KB
|
63 lines
on checkKey
if the key = RETURN then
if field "passwordbox" contains "plasma" then
go to frame "start"
else
go to frame "nopass"
end if
when keydown then nothing
end if
end checkkey
on firstFrame
global qtSprite
set the movieRate of sprite qtSprite = 0
set the movieTime of sprite qtSprite = 0
end firstFrame
on lastFrame
global qtSprite,qtcastname
set the movieTime of sprite qtSprite = the duration of cast qtcastName
end lastFrame
on stepFwdQT
global qtSprite,qtcastname
set the movieRate of sprite qtSprite = 0
if the movieTime of sprite qtSprite < the duration of cast qtcastname then
set the movieTime of sprite qtSprite = the movieTime of sprite qtSprite + 1
end if
end stepFwdQT
on stepRevQT
global qtSprite
set the movieRate of sprite qtSprite = 0
if the movieTime of sprite qtSprite = 0 then exit
set the movieTime of sprite qtSprite = the movieTime of sprite qtSprite - 1
end stepRevQT
on frameCounter
global qtSprite
set the text of cast "counter" to string(the movieTime of sprite qtSprite)
end frameCounter
--on rewindQT
global qtSprite
set the movieRate of sprite qtSprite = -3
--set the movieTime of sprite qtSprite = 0
end rewindQT
on pauseQT
global qtSprite
set the movieRate of sprite qtsprite = 0
end pauseQT
on playQT
global qtSprite,qtcastName
set the movieRate of sprite qtSprite = 1
end playQT
on playQT2
global qtSprite,qtcastName
set the movieRate of sprite qtSprite = 1
end playQT2